home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Online / AmiComSys / rexx / SendIRC.amicomsys < prev    next >
Encoding:
Text File  |  1998-01-25  |  513 b   |  26 lines
  1. /* Send IRC-address to your IRC-client
  2.  Currently supported is AmIRC.
  3.  $VER: SendIRC.amicomsys 1.0 (24.1.1998) Håkan Parting
  4. */
  5. parse arg server'/'channel
  6.  
  7. /*
  8. if show('P','AMIRC.1') then
  9. do
  10.     ADDRESS AMIRC.1 SAY "/SERVER "server
  11.     ADDRESS AMIRC.1 SAY "/JOIN "channel
  12.     Exit
  13. end
  14. */
  15.  
  16. /* Set the path to your AmIRC-client under the Misc-page in AmiComSys settings.
  17. */
  18.  
  19. OPTIONS RESULTS;
  20.  
  21. ADDRESS AMICOMSYS GET stem info.;
  22.  
  23. ADDRESS COMMAND "c:run >NIL: "info.ircprgpath" Server="server" AutoJoin="channel" connect"
  24.  
  25. Exit
  26.